home *** CD-ROM | disk | FTP | other *** search
/ Software Vault: The Gold Collection / Software Vault - The Gold Collection (American Databankers) (1993).ISO / cdr22 / dmbb25.zip / BBTEST.BAT next >
DOS Batch File  |  1992-01-11  |  2KB  |  76 lines
  1. @echo off
  2. echo off 
  3. echo Test DMBB (c) Daniel MONTARON 1989.
  4. REM ╔═══════════════════════════╦═══════════════════════════╗
  5. REM ║        Attention !!       ║        WARNING  !!!       ║
  6. REM ║    IF ERRORLEVEL = X      ║    IF ERRORLEVEL = X      ║
  7. REM ║ doit etre compris comme : ║   must be interpreted as: ║
  8. REM ║ if errorlevel SUPÉRIEUR   ║ if errorlevel GREATER     ║
  9. REM ║      ou égal à X          ║      or equal to X        ║
  10. REM ╚═══════════════════════════╩═══════════════════════════╝
  11.  
  12. dmbb type
  13. for %%x in (0 1 2 3 4 5 6 7 8) do if errorlevel=%%x set Z=%%x
  14. goto %z%
  15. :0
  16. echo Your computer is ancient...
  17. echo (Votre ordinateur est ... une antiquité !)
  18. goto fin
  19. :1
  20. echo You have got the first XT.
  21. echo (Vous possédez un vieil XT de derrière les fagots...)
  22. goto fin
  23. :2
  24. echo You're the last guy with a PC-Junior.
  25. echo (Vous êtes le dernier à possèder un PC-Junior...)
  26. goto fin
  27. :3
  28. dmbb mod
  29. for %%x in (1 2 4 5 9) do if errorlevel=%%x set Z=b%%x
  30. goto %z%
  31. :b1
  32. echo Shall you got an AT (or compatible) ?
  33. echo (N'auriez-vous pas un AT ou compatible AT ?)
  34. goto fin
  35. :b2
  36. echo You have got an XT (or compatible) 80286.
  37. echo (Vous possédez un XT -ou compatible- 80286.)
  38. goto fin
  39. :b4
  40. echo Hey ! A PS/2 type 50
  41. echo (Tiens ! Un PS/2 type 50)
  42. goto fin
  43. :b5
  44. echo Hey ! A PS/2 type 60
  45. echo (Tiens ! Un PS/2 type 60)
  46. goto fin
  47. :b9
  48. echo Fine !  A PS/2 type 30 - 80286
  49. echo (Excellent!  Un PS/2 type 30 - 80286)
  50. goto fin
  51. :4
  52. echo You have got a second generation XT.
  53. echo (Votre bécane est un XT ou compatible XT modèle 2)
  54. goto fin
  55. :5
  56. echo Nice! You have got an PS/2 modele 30.
  57. echo Bravo ! Vous avez un PS/2 modèle 30.
  58. goto fin
  59. :6
  60. echo A PC Convertible (It's possible ?)
  61. echo Vous avez un PC Convertible (Ça existe ?)
  62. goto fin
  63. :7
  64. dmbb mod
  65. if errorlevel= 1 goto a1
  66. echo PS/2 type 70...
  67. goto fin
  68. :a1
  69. echo  PS/2 type 80 !?!
  70. goto fin
  71. :8
  72. echo I'm confuse...
  73. echo (J'connais pas votre bécane !)
  74. :fin
  75. set Z=
  76.